﻿
''' <summary>
''' Events arguments representing a Zip creation request.
''' </summary>
Public Class ZipCreationRequestedEventArgs
    Inherits EventArgs
    Public Sub New(ByVal rootzipnode As ZipNode, ByVal ziplocation As String)
        _RootZipNode = rootzipnode
        _Location = ziplocation
    End Sub
    Private _RootZipNode As ZipNode
    Public ReadOnly Property RootZipNode As ZipNode
        Get
            Return _RootZipNode
        End Get
    End Property
    Private _Location As String
    Public ReadOnly Property Location As String
        Get
            Return _Location
        End Get
    End Property
End Class
